-- card: 31445 from stack: in.03 ะตะตะต -- bmap block id: 3005 -- flags: 0000 -- background id: 2766 -- name: ----- HyperTalk script ----- on openCard send cardOpened to background end openCard on move global direction,pillarEat,trollDead,blastDam,holeDam,chase,blasting if direction = "east" or direction = "rear" then if blastDam = true then go to card id 26754 else go to card id 27307 end if exit move end if if direction = "west" or direction = "down" or direction = "south" then beep put "Sorry, no swimming allowed in this cave." into field 3 exit move end if if direction = "enter" then go to card id 31944 exit move end if pass move end move on closeCard set the cursor to 4 put "" into field 3 end closeCard on take global object,carried -- remember to update carried if you do not pass take pass take end take on drop global object,dropRoom,carried answer "Drop object onto ledge, or in the water?" with "water"or"on ledge" if it="water" then put "33443" into dropRoom -- remember to update carried if you do not pass drop pass drop end drop on use global object,carried -- update carried if use results in loss of object pass use end use -- part 16 (button) -- low flags: 80 -- high flags: 2000 -- rect: left=210 top=230 right=266 bottom=244 -- title width / last selected line: 0 -- icon id / first selected line: 9301 / 9301 -- text alignment: 1 -- font id: 0 -- text size: 12 -- style flags: 0 -- line height: 16 -- part name: knife ----- HyperTalk script ----- on mouseUp global takeFlag,examFlag,object,cardID put the name of the target into object if takeFlag = true then send take to card id cardID else put "a knife" into field 3 put false into examFlag end mouseUp -- part 17 (button) -- low flags: 80 -- high flags: 2000 -- rect: left=74 top=230 right=266 bottom=108 -- title width / last selected line: 0 -- icon id / first selected line: 1015 / 1015 -- text alignment: 1 -- font id: 0 -- text size: 12 -- style flags: 0 -- line height: 16 -- part name: nodule ----- HyperTalk script ----- on mouseUp global takeFlag,examFlag,object,cardID put the name of the target into object if takeFlag = true then send take to card id cardID else put "a silicon sphere" into field 3 put false into examFlag end mouseUp -- part 18 (button) -- low flags: 80 -- high flags: 2000 -- rect: left=176 top=230 right=266 bottom=210 -- title width / last selected line: 0 -- icon id / first selected line: 14953 / 14953 -- text alignment: 1 -- font id: 0 -- text size: 12 -- style flags: 0 -- line height: 16 -- part name: ladder ----- HyperTalk script ----- on mouseUp global takeFlag,examFlag,object,cardID put the name of the target into object if takeFlag = true then send take to card id cardID else put "a rope ladder" into field 3 put false into examFlag end mouseUp -- part 19 (button) -- low flags: 80 -- high flags: 2000 -- rect: left=143 top=230 right=266 bottom=177 -- title width / last selected line: 0 -- icon id / first selected line: 1019 / 1019 -- text alignment: 1 -- font id: 0 -- text size: 12 -- style flags: 0 -- line height: 16 -- part name: bomb ----- HyperTalk script ----- on mouseUp global takeFlag,examFlag,object,cardID put the name of the target into object if takeFlag = true then send take to card id cardID else put "a time bomb" into field 3 put false into examFlag end mouseUp -- part 20 (button) -- low flags: 80 -- high flags: 2000 -- rect: left=40 top=230 right=266 bottom=74 -- title width / last selected line: 0 -- icon id / first selected line: 24317 / 24317 -- text alignment: 1 -- font id: 0 -- text size: 12 -- style flags: 0 -- line height: 16 -- part name: key ----- HyperTalk script ----- on mouseUp global takeFlag,examFlag,object,cardID put the name of the target into object if takeFlag = true then send take to card id cardID else put "a key" into field 3 put false into examFlag end mouseUp -- part 21 (button) -- low flags: 80 -- high flags: 2000 -- rect: left=109 top=230 right=266 bottom=143 -- title width / last selected line: 0 -- icon id / first selected line: 7012 / 7012 -- text alignment: 1 -- font id: 0 -- text size: 12 -- style flags: 0 -- line height: 16 -- part name: gem ----- HyperTalk script ----- on mouseUp global takeFlag,examFlag,object,cardID put the name of the target into object if takeFlag = true then send take to card id cardID else put "a glowing gem" into field 3 put false into examFlag end mouseUp -- part 34 (button) -- low flags: 00 -- high flags: 0000 -- rect: left=91 top=52 right=87 bottom=135 -- title width / last selected line: 0 -- icon id / first selected line: 0 / 0 -- text alignment: 1 -- font id: 0 -- text size: 12 -- style flags: 0 -- line height: 16 -- part name: ----- HyperTalk script ----- on mouseUp global examFlag,direction,cardID,takeFlag if takeFlag then beep put "You have to get across the water to use that door!" into field 3 put false into takeFlag else put "A ledge and doorway on the west wall, across the water." into field 3 put false into examFlag end if end mouseUp -- part 41 (button) -- low flags: 00 -- high flags: 0000 -- rect: left=169 top=192 right=226 bottom=245 -- title width / last selected line: 0 -- icon id / first selected line: 0 / 0 -- text alignment: 1 -- font id: 0 -- text size: 12 -- style flags: 0 -- line height: 16 -- part name: ----- HyperTalk script ----- on mouseUp global examFlag,direction,cardID,takeFlag if examFlag then put "a giant wash tub is floating here." into field 3 put false into examFlag exit mouseUp else if takeFlag then beep put false into takeFlag put "The giant wash tub is too heavy for you to carry." into field 3 exit mouseUp else put "enter" into direction end if end if send move to card id cardID end mouseUp -- part contents for background part 25 ----- text ----- East Ledge (looking west) -- part contents for background part 24 ----- text ----- You are on the east ledge of the great chamber which is now flooded with water nearly to the level of the ledge. A giant wash tub is floating in the water here. There is a doorway to the east. -- part contents for background part 36 ----- text ----- 1